home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 1 (Walnut Creek)
/
Aminet - June 1993 [Walnut Creek].iso
/
aminet
/
gfx
/
3d
/
rayshade40_enh2.lha
/
Examples
/
glass.def.ray
< prev
next >
Wrap
Text File
|
1992-02-09
|
348b
|
21 lines
/*
* Drinking glass object.
* C. Kolb 12/89
*/
name glass
union
torus 0.95 0.06 0 0 2 0 0 1
difference
list /* outer glass */
cone 0.9 0 0 -0.001 1.0 0 0 2
disc 1 0 0 2 0 0 1
disc 0.9 0 0 -.001 0 0 -1
end
list /* inner glass */
cone 0.7 0 0 0.1 0.9 0 0 2.2
disc .9 0 0 2.2 0 0 1
disc .7 0 0 0.1 0 0 -1
end
end
end